optional compiling-tools

: $cd ( path len -- )
   pad zplace pad SetCurrentDirectory 0= abort" invalid directory" ;

: includedir
   >in @
   pushpath 0 parse -name $cd
   >in !
   0 parse -path included
   poppath ;

: ?(
   bright postpone ?( normal ; immediate ( )
